home *** CD-ROM | disk | FTP | other *** search
/ Oxygen Multimedia Graphics 22 / Oxygen Multimedia Graphics 22.iso / pc / System / OX22 / PDC_152_OpenPPT_Final.ls < prev    next >
Encoding:
Text File  |  2008-03-12  |  714 b   |  19 lines
  1. global ds, goUp, gList, giNum, gtNum, gtColor
  2.  
  3. on mouseUp
  4.   filePath = the moviePath & goUp & "Artwork"
  5.   put filePath
  6.   imageName = "i" & giNum
  7.   tName = "t" & gtNum
  8.   ArtName = getAt(gList, imageName)
  9.   templateName = getAt(gList, tName)
  10.   PPTFile = filePath & ds & ArtName & ds & templateName & ds & templateName & "-" & ArtName & ".pot"
  11.   put PPTFile
  12.   OpenIt = baOpenFile(PPTFile, EMPTY)
  13.   if OpenIt > 32 then
  14.     nothing()
  15.   else
  16.     alert("The software required to open the PowerPoint file could not be found. If you don't have PowerPoint, a PowerPoint Viewer is available on this disc in the Extras>Software folder. Or, the file may not open if you aren't running this menu from the CD-ROM.")
  17.   end if
  18. end
  19.